home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #3 / Amiga Plus CD - 2002 - No. 03.iso / AmigaPlus / Tools / Development / envCPP31 / autorun / c++.rexx
Encoding:
OS/2 REXX Batch file  |  2002-01-01  |  1.6 KB  |  85 lines
  1. /* rexx */
  2.  
  3. options results                             /* enable return codes     */
  4.  
  5. if (left(address(), 6) ~= "GOLDED") then    /* not started by GoldEd ? */
  6.  
  7.     address 'GOLDED.1'
  8.  
  9. 'LOCK CURRENT RELEASE=4'                    /* lock GUI, gain access   */
  10.  
  11. if (RC ~= 0) then
  12.  
  13.     exit
  14.  
  15. options failat 6                            /* ignore warnings         */
  16.  
  17. signal on syntax                            /* ensure clean exit       */
  18.  
  19. /* ---------------------- INSERT YOUR CODE HERE ---------------------- */
  20.  
  21. 'QUERY CAT'
  22.  
  23. if (RESULT = "deutsch") then do
  24.  
  25.     STRING.sCOMPLETING   = "Vervollständigung der Installation der C/C++-Erweiterung..."
  26.     STRING.sGENEARTESKIP = "!ERZEUGEN|Überspringen"
  27. end
  28. else do
  29.  
  30.     STRING.sCOMPLETING   = "Completing installation of C/C++ add-on..."
  31.     STRING.sGENEARTESKIP = "!GENERATE|Skip this step"
  32. end
  33.  
  34. 'REQUEST STATUS="' || STRING.sCOMPLETING || '"'
  35.  
  36. 'IMAGES VALIDATE'
  37.  
  38. /* set default options for macros (if unset) */
  39.  
  40. 'QUERY OPTIONFOLDMARKERS'
  41.  
  42. if (RESULT = "") then
  43.  
  44.     'SET OPTIONFOLDMARKERS="FALSE"'
  45.  
  46. 'QUERY OPTIONCOMMENT'
  47.  
  48. if (RESULT = "") then
  49.  
  50.     'SET OPTIONCOMMENT="TRUE"'
  51.  
  52. 'QUERY OPTIONBROWSER'
  53.  
  54. if (RESULT = "") then
  55.  
  56.     'SET OPTIONBROWSER="TRUE"'
  57.  
  58. /* activate c mode (cache images for toolbar) */
  59.  
  60. 'SET TYPE="*.c"'
  61.  
  62. /* reset container sizes */
  63.  
  64. 'API UNDEF'
  65.  
  66. /* exit c mode */
  67.  
  68. 'TYPE RESET'
  69.  
  70. 'PREFS GLOBAL SAVE FORCE'
  71.  
  72. 'REQUEST STATUS=""'
  73.  
  74. /* ------------------------- END OF YOUR CODE ------------------------ */
  75.  
  76. 'UNLOCK'                                    /* unlock GUI              */
  77.  
  78. exit
  79.  
  80. SYNTAX:
  81.  
  82. SAY "Error in line" SIGL ":" ERRORTEXT(RC)
  83.  
  84. 'UNLOCK'
  85.